home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / other-tools / adagis v3.2 / install / english.ins < prev    next >
Encoding:
Text File  |  1996-04-16  |  2.4 KB  |  114 lines
  1. ;Install script for Adagis v3.2
  2. ;© 1996 Stv
  3. ;
  4. ;Install the main program
  5. ;
  6. (set directory
  7.     (askdir
  8.         (prompt "Where do you want Adagis to be installed ?\n(no drawer will be created)")
  9.         (help @askdir-help)
  10.         (default "Sys:WBStartUp")
  11.     )
  12. )
  13. (set @default-dest directory)
  14. (copyfiles
  15.     (prompt "Copy Adagis program:")
  16.     (help @copyfiles-help)
  17.     (dest directory)
  18.     (source "/bin/Adagis")
  19. )
  20. ;
  21. ;Select the Icon
  22. ;
  23. (set icon
  24.     (askchoice
  25.         (help @askchoice-help)
  26.         (prompt "Select which Adagis icon you want to install:")
  27.         (choices "NewIcon" "MagicWB 1" "MagicWB 2" "Iconographics")
  28.         (default 0)
  29.     )
  30. )
  31. (select icon
  32.     (set icon "/icons/newicon.info")
  33.     (set icon "/icons/magicwb1.info")
  34.     (set icon "/icons/magicwb2.info")
  35.     (set icon "/icons/Iconographics.info")
  36. )
  37. (copyfiles
  38.     (prompt "Install Adagis icon")
  39.     (help @copyfiles-help)
  40.     (dest directory)
  41.     (source icon)
  42.     (newname "Adagis.info")
  43. )
  44. (set fulliconfile (tackon directory "Adagis"))
  45. ;
  46. ;Install Adagis.data
  47. ;
  48. (set quinfitxer
  49.     (askchoice
  50.         (help @askchoice-help)
  51.         (prompt "Which Adagis.data install ?\n\nANY PREVIOUS ADAGIS.DATA WILL BE DELETED\n")
  52.         (choices "English" "Catalan" "Spanish" "None")
  53.         (default 0)
  54.     )
  55. )
  56. (set datadir
  57.     (askdir
  58.         (prompt "Where do you want Adagis.data to be installed ?\n(no drawer will be created)")
  59.         (help @askdir-help)
  60.         (default "s:")
  61.     )
  62. )
  63. (if (<> 3 quinfitxer)            ; Delete file if required
  64.     (delete "s:adagis.data"
  65.         (help @delete-help)
  66.         (prompt "Delete existing Adagis.data")
  67.     )
  68. )
  69. (select quinfitxer
  70.     (set datafile "/s/adagis.data.eng")
  71.     (set datafile "/s/adagis.data.cat")
  72.     (set datafile "/s/adagis.data.esp")
  73. )
  74. (copyfiles
  75.     (prompt "Copy Adagis.data file")
  76.     (help @copyfiles-help)
  77.     (dest datadir)
  78.     (source datafile)
  79.     (newname "adagis.data")
  80. )
  81. (set fulldatafile (tackon datadir "adagis.data"))
  82. (tooltype
  83.     (prompt "Modify Adagis tooltype ADAGISFILE")
  84.     (settooltype "ADAGISFILE" fulldatafile)
  85.     (dest fulliconfile)
  86. )
  87. ;
  88. ;Install locale files
  89. ;
  90. (set locales
  91.     (askoptions
  92.         (prompt "Which catalogs do you want me to install ?")
  93.         (help @askoptions-help)
  94.         (choices "Spanish" "Catalan")
  95.         (default 00)
  96.     )
  97. )
  98. (if (in locales 0)
  99.     (copyfiles
  100.         (source "/locale/catalogs/español/adagis.catalog")
  101.         (dest "locale:catalogs/español/")
  102.         (prompt "Copying Spanish catalogs")
  103.         (help @copyfiles-help)
  104.     )
  105. )
  106. (if (in locales 1)
  107.     (copyfiles
  108.         (source "/locale/catalogs/català/adagis.catalog")
  109.         (dest "locale:catalogs/català/")
  110.         (prompt "Copying Catalan catalogs")
  111.         (help @copyfiles-help)
  112.     )
  113. )
  114.